package com.mrzhou.core.tool.utils;

import com.fasterxml.jackson.core.type.TypeReference;
import com.mrzhou.core.tool.constants.CharsetsConstant;
import com.mrzhou.core.tool.constants.StringSymbol;
import lombok.extern.slf4j.Slf4j;
import org.springframework.core.BridgeMethodResolver;
import org.springframework.core.DefaultParameterNameDiscoverer;
import org.springframework.core.MethodParameter;
import org.springframework.core.ParameterNameDiscoverer;
import org.springframework.core.annotation.AnnotatedElementUtils;
import org.springframework.core.annotation.SynthesizingMethodParameter;
import org.springframework.util.ClassUtils;

import java.io.File;
import java.io.IOException;
import java.lang.annotation.Annotation;
import java.lang.reflect.Method;
import java.net.JarURLConnection;
import java.net.URL;
import java.net.URLDecoder;
import java.util.Enumeration;
import java.util.HashSet;
import java.util.Map;
import java.util.Set;
import java.util.jar.JarEntry;
import java.util.jar.JarFile;

@Slf4j
public class ClassUtil extends ClassUtils {

    private static final ParameterNameDiscoverer PARAMETER_NAME_DISCOVERER = new DefaultParameterNameDiscoverer();

    /**
     * 将Map转换成对象
     */
    public static <T> T toBean(Map<String, Object> map, Class<T> clazz) {
       return JacksonUtil.parseObject(JacksonUtil.toJsonString(map), clazz);
    }

    public static <T> T toBean(Map<String, Object> map, TypeReference<T> typeReference) {
        return JacksonUtil.parseObject(JacksonUtil.toJsonString(map), typeReference);
    }

    public static boolean isClass(Class<?> clazz) {
        return (!clazz.isEnum() && !clazz.isInterface() && !clazz.isAnnotation()) ;
    }

    public static Set<Class<?>> getClasses(String packageName) {
        Set<Class<?>> classes = new HashSet<>();
        // 是否循环迭代
        boolean recursive = true;
        // 获取包名称替换成路径名
        String packageDirName = packageName.replace(".", "/");
        Enumeration<URL> dirs;
        try{
            dirs = Thread.currentThread().getContextClassLoader().getResources(packageDirName);
            while(dirs.hasMoreElements()) {
                URL url = dirs.nextElement();
                // 得到协议的名称
                String protocol = url.getProtocol();
                // 如果是以文件的形式保存在服务器上
                if (StringSymbol.PROTOCOL_FILE.equals(protocol)) {
                    String filePath = URLDecoder.decode(url.getFile(), CharsetsConstant.UTF_8_NAME);
                    findAndAddClassesInPackageByFile(packageName, filePath, recursive, classes);
                } else if (StringSymbol.PROTOCOL_JAR.equals(protocol)) {
                    findAndAddClassesInJarByFile(url, packageName, packageDirName, recursive, classes);
                }
            }
        } catch (IOException e) {

        }
        return classes;
    }

    public static boolean checkSuperClass(Class clazz, Class superClass) {
        Class sCl = clazz.getSuperclass();
        while (null != sCl) {
            if(equalsClass(sCl, superClass)) {
                return true;
            }
            sCl = sCl.getSuperclass();
        }
        return false;
    }

    public static boolean checkImplClass(Class clazz, Class implClass) {
        Class[] classes = clazz.getInterfaces();
        if(null != classes) {
            for(Class cl: classes) {
                if(equalsClass(cl, implClass)) {
                    return true;
                }
            }
        }
        return false;
    }

    /**
     * 判断两个class是否为同一个类
     *  判断逻辑：
     *      两个class对应的ClassLoader要为同一个
     *      两个class的类路径要完全一致
     * @param clazz
     * @param target
     * @return
     */
    public static boolean equalsClass(Class clazz, Class target) {
        ClassLoader classLoader = clazz.getClassLoader();
        ClassLoader targetLoader = target.getClassLoader();
        String classPath = clazz.getName();
        String targetPath = target.getName();
        return classLoader == targetLoader && classPath.equals(targetPath);
    }

    /**
     * 返回实现的限制
     * @param classPath
     * @param clazz
     * @param <T>
     * @return
     */
    public static <T> Class<? extends T> getImplClass(String classPath, Class<T> clazz) {
        try{
            Class<?> aClass = Class.forName(classPath);
            if (checkImplClass(aClass, clazz)) {
                return (Class<? extends T>) aClass;
            }
        } catch (ClassNotFoundException e) {
            throw new RuntimeException(String.format("无法找到指定的%s的类", classPath), e);
        }
        throw new RuntimeException(String.format("%s并未实现%s", classPath, clazz));
    }

    /**
     * 返回继承的父类限制
     * @param classPath
     * @param clazz
     * @param <T>
     * @return
     */
    public static <T> Class<? extends T> getSuperClass(String classPath, Class<T> clazz) {
        try{
            Class<?> aClass = Class.forName(classPath);
            Class<?> sClass = aClass.getSuperclass();
            while (null != sClass) {
                if (equalsClass(clazz, sClass)) {
                    return (Class<? extends T>) aClass;
                }
                sClass = sClass.getSuperclass();
            }

            if (checkSuperClass(aClass, clazz)) {
                return (Class<? extends T>) aClass;
            }
        } catch (ClassNotFoundException e) {
            throw new RuntimeException(String.format("无法找到指定的%s的类", classPath), e);
        }
        throw new RuntimeException(String.format("%s并未实现%s", classPath, clazz));
    }

    /**
     * 检查类是否继承或者实现某个类
     * @param checkClass 需检查的类
     * @param clazz 继承或者实现的类
     * @return
     */
    public static boolean checkClassExtendsAndImpl(Class checkClass, Class<?> clazz) {
        boolean isInterface = clazz.isInterface();

        // 先检查父类是否包含
        Class superClass = checkClass.getSuperclass();
        while (null != superClass) {

            if (clazz.isInterface()) {
                Class[] impls = superClass.getInterfaces();
                for (Class cl : impls) {

                }

            }
            superClass = superClass.getSuperclass();
        }
        return false;
    }

    /**
     * Method.getDeclaringClass 方法作用:
     *  获取方法体的Class对象
     * ClassUtils.getMostSpecificMethod 方法作用:
     *  查找targetClass对象中最接近method的方法体
     * BridgeMethodResolver.findBridgedMethod 方法作用:
     *  判断是否桥接方法, 如果不是就直接返回
     * AnnotatedElementUtils.findMergedAnnotation 方法作用:
     *  在element上查询annotationType类型注解
     *  将查询出的多个annotationType类型注解属性合并到查询的第一个注解中
     *  多个相同注解合并
     */
    public static <A extends Annotation> A getAnnotation(Method method, Class<A> clazz) {
        Class<?> targetClass = method.getDeclaringClass();
        Method specificMethod = getMostSpecificMethod(method, targetClass);
        /** 获取代理对象上的注解, 解决在AOP中如果方法体本身也被代理的情况下获取不到注解的值 */
        specificMethod = BridgeMethodResolver.findBridgedMethod(specificMethod);
        // 获取可能是添加到方法体上又或者是添加在类上的注解对象, 如有多个则合并到第一个注解中去
        A annotation = AnnotatedElementUtils.findMergedAnnotation(specificMethod, clazz);
        return null != annotation ? annotation : AnnotatedElementUtils.findMergedAnnotation(specificMethod.getDeclaringClass(), clazz);
    }

    public static MethodParameter getMethodParameter(Method method, int parameterIndex) {
        // 根据偏移量, 获取方法对象上的指定参数的代理
        MethodParameter methodParameter = new SynthesizingMethodParameter(method, parameterIndex);
        methodParameter.initParameterNameDiscovery(PARAMETER_NAME_DISCOVERER); // 初始化参数
        return methodParameter;
    }

    private static void findAndAddClassesInPackageByFile(String packageName, String packagePath, final boolean recursive, Set<Class<?>> classes) {
        // 获取此包的目录 建立一个File
        File dir = new File(packagePath);
        // 如果不存在或者 也不是目录就直接返回
        if (!dir.exists() || !dir.isDirectory()) {
            return;
        }

        // 如果存在 就获取包下的所有文件 包括目录
        File[] dirFiles = dir.listFiles((file) -> {
            // 自定义过滤规则 如果可以循环(包含子目录) 或则是以.class结尾的文件(编译好的java类文件)
            return (recursive && file.isDirectory()) || (file.getName().endsWith(".class"));
        });

        for(File file : dirFiles) {
            if(file.isDirectory()) {
                findAndAddClassesInPackageByFile(packageName + "."+ file.getName(), file.getAbsolutePath(), recursive, classes);
            } else {
                // 如果是java类文件 去掉后面的.class 只留下类名
                String className = file.getName().substring(0, file.getName().length() - 6);
                try {
                    classes.add(Thread.currentThread().getContextClassLoader().loadClass(packageName + "." + className));
                } catch (ClassNotFoundException e) {
                    e.printStackTrace();
                }
            }
        }
    }

    private static void findAndAddClassesInJarByFile(URL url, String packageName, String packageDirName, final boolean recursive, Set<Class<?>> classes) {
        JarFile jar = null;
        // 获取jar
        try {
            jar = ((JarURLConnection) url.openConnection()).getJarFile();
            // 从此jar包 得到一个枚举类
            Enumeration<JarEntry> entries = jar.entries();
            while (entries.hasMoreElements()) {
                // 获取jar里的一个实体 可以是目录 和一些jar包里的其他文件 如META-INF等文件
                JarEntry jarEntry = entries.nextElement();
                String name = jarEntry.getName();
                // 如果是以/开头的
                if (name.charAt(0) == '/') {
                    // 获取后面的字符串
                    name = name.substring(1);
                }
                // 如果前半部分和定义的包名相同
                if (name.startsWith(packageDirName)) {
                    int idx = name.lastIndexOf('/');
                    // 如果以"/"结尾 是一个包
                    if (idx != -1) {
                        // 获取包名 把'/'替换成'.'
                        packageName = name.substring(0, idx).replace('/', '.');
                    }
                    // 如果可以迭代下去 并且是一个包
                    if ((idx != -1 || recursive)) {
                        // 如果是一个.class文件 而且不是目录
                        if (name.endsWith(".class") && !jarEntry.isDirectory()) {
                            String className = name.substring(packageName.length() + 1, name.length() - 6);
                            // 添加到classes
                            try {
                                classes.add(Class.forName(packageName + '.' + className));
                            } catch (ClassNotFoundException e) {
                                e.printStackTrace();
                            }
                        }
                    }
                }
            }
        } catch (IOException e) {
            e.printStackTrace();
        }
    }

}
